The following code is an example of how to use the PEOutputToPrinter function:
LOCAL result, nCopies, nError
nCopies = 2
&& Print 2 copies of report
result = PEOutputToPrinter(Job, Copies)
IF result = .F.
nError = PEGetErrorCode(Job)
&& Handle error
PEClosePrintJob(Job)
return
ENDIF
Seagate Software IMG Holdings, Inc. http://www.seagatesoftware.com Support services: http://support.seagatesoftware.com |